home *** CD-ROM | disk | FTP | other *** search
/ Libris Britannia 4 / science library(b).zip / science library(b) / PROGRAMM / PROGEDIT / 3528.ZIP / CBX300.EXE / F77.LNG < prev    next >
Text File  |  1992-04-07  |  3KB  |  127 lines
  1. ><  []
  2. executable_program
  3. >executable_program
  4. main_program
  5. function_subprogram
  6. subroutine_program
  7. block_data_subprogram
  8. <main_program program_statement
  9. [statements1]...
  10. [specification_statements]...
  11. [statement_function_statements]...
  12. [executable_statements]...
  13. [label] END
  14. <function_subprogram function_statement
  15. [statements1]...
  16. [specification_statements]...
  17. [statement_function_statements]...
  18. [executable_statements]...
  19. [label] END
  20. <subroutine_program subroutine_statement
  21. [statements1]...
  22. [specification_statements]...
  23. [statement_function_statements]...
  24. [executable_statements]...
  25. [label] END
  26. <block_data_subprogram block_data_statement
  27. [statements1]...
  28. [specification_statements]...
  29. [statement_function_statements]...
  30. [executable_statements]...
  31. [label] END
  32. >statements1
  33. label format_statement
  34. [label] entry_statement
  35. [label] parameter_statement
  36. [label] implicit_statement
  37. >specification_statements
  38. label format_statement
  39. [label] entry_statement
  40. [label] parameter_statement
  41. [label] dimension_statement
  42. [label] other_specification_statement
  43. >statement_function_statements
  44. label format_statement
  45. [label] entry_statement
  46. [label] data_statement
  47. [label] statement_function_statement
  48. >executable_statements
  49. label format_statement
  50. [label] entry_statement
  51. [label] data_statement
  52. [label] executable_statement
  53. >other_specification_statement
  54. [label] equivalence_statement
  55. [label] common_statement
  56. [label] type_statement
  57. [label] external_statement
  58. [label] intrinsic_statement
  59. [label] save_statement
  60. >executable_statement
  61. [label] assignment_statement
  62. [label] goto_statement
  63. [label] arithmetic_if_statement
  64. [label] block_if_statement
  65. [label] logical_if_statement
  66. [label] else_if_statement
  67. [label] else_statement
  68. [label] end_if_statement
  69. [label] do_statement
  70. [label] continue_statement
  71. [label] stop_statement
  72. [label] pause_statement
  73. [label] read_statement
  74. [label] write_statement
  75. [label] print_statement
  76. [label] rewind_statement
  77. [label] backspace_statement
  78. [label] endfile_statement
  79. [label] open_statement
  80. [label] close_statement
  81. [label] inquire_statement
  82. [label] call_statement
  83. [label] return_statement
  84. <program_statement PROGRAM program_name
  85. >entry_statement
  86. function_entry
  87. subroutine_entry
  88. <function_statement
  89. type FUNCTION function_name [parameter_list]
  90. <parameter_list ( [parameter_specification )
  91. <parameter_specification
  92. variable_name [,parameter_specification]...
  93. <break_statement break;
  94. <continue_statement continue;
  95. <do_statement do
  96.    statement
  97. while (expression);
  98. <for_statement for (expression_1; expression_2; expression_3)
  99.    statement
  100. <goto_statement goto identifier;
  101. <if_statement if (expression)
  102.    statement
  103. <if_else_statement if (expression)
  104.    statement
  105. else
  106.    statement
  107. <if_elseif_else_statement if (expression)
  108.    statement
  109. else if (expression)
  110.    statement
  111. else
  112.    statement
  113. <null_statement ;
  114. <return_statement return expression;
  115. <switch_statement switch (expression)
  116. {
  117.    case_constructs
  118.    default:
  119.       break;
  120. }
  121. <case_constructs case constant:
  122.    statement;
  123.    break;
  124. case_constructs
  125. <while_statement while (expression)
  126.    statement
  127.